home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Info-Mac 4
/
Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso
/
Development
/
General
/
ViewIt™ 2.24 Shareware
/
Pascal Demo Projects
/
Metrowerks Pascal 1.0d7 Demos
/
MinimumMP.p
< prev
next >
Wrap
Text File
|
1994-03-02
|
263b
|
14 lines
{Minimum MP Demonstration Program}
{©FaceWare 1991-94. All Rights Reserved.}
program MinimumMP;
uses
FaceStorMP, FaceProcMP;
begin
fRec.uName := 'Minimum.Rsrc';
FaceIt(nil, DoInit, 0, 0, 0, 0);
repeat
FaceIt(nil, DoLoop, 0, 0, 0, 0);
until false;
end.